﻿Imports System.ComponentModel

Public Class BaoCaoBUS
    Public Sub LoadCBX(ByVal cbx As ComboBox, ByVal sql As String)
        Dim BaoCao_DAO As BaoCaoDAO = New BaoCaoDAO
        BaoCao_DAO.LoadCombobox(cbx, sql)
    End Sub
    Public Sub LoadDGV(ByVal dgv As DataGridView, ByVal sql As String)
        Dim BaoCao_DAO As BaoCaoDAO = New BaoCaoDAO
        BaoCao_DAO.LoadGridView(dgv, sql)
    End Sub
    Public Function ThemBaoCao(ByVal bcInsert As BaoCaoDTO) As Boolean
        Dim BaoCao_DAO As BaoCaoDAO = New BaoCaoDAO
        Return BaoCao_DAO.ThemBaoCao(bcInsert)
    End Function
    Public Function XoaBaoCao(ByVal id As String) As Boolean
        Dim BaoCao_DAO As BaoCaoDAO = New BaoCaoDAO
        Return BaoCao_DAO.XoaBaoCao(id)
    End Function
    Public Function SuaBaoCao(ByVal bcUpdate As BaoCaoDTO) As Boolean
        Dim BaoCao_DAO As BaoCaoDAO = New BaoCaoDAO
        Return BaoCao_DAO.SuaBaoCao(bcUpdate)
    End Function
    Public Function GetList() As BindingList(Of BaoCaoDTO)
        Dim bc_DAO As BaoCaoDAO = New BaoCaoDAO
        Return bc_DAO.GetList()
    End Function
End Class
